home *** CD-ROM | disk | FTP | other *** search
/ Clickx 22 / Clickx 22.iso / Menu.dxr / 00021_knop_install.ls < prev    next >
Encoding:
Text File  |  2005-01-01  |  804 b   |  35 lines

  1. property pFile
  2.  
  3. on mouseEnter me
  4.   sprite(me.spriteNum).member = "install_knop_R"
  5. end
  6.  
  7. on mouseLeave me
  8.   sprite(me.spriteNum).member = "install_knop_N"
  9. end
  10.  
  11. on mouseDown me
  12.   sprite(me.spriteNum).member = "install_knop_D"
  13. end
  14.  
  15. on mouseUp me
  16.   if the platform contains "windows" then
  17.     dirChar = "\"
  18.   else
  19.     dirChar = ":"
  20.   end if
  21.   if pFile = "PhotoSuite5SE.exe" then
  22.     if the runMode contains "Author" then
  23.       if the platform contains "Windows" then
  24.         window().new("info")
  25.         window("info").titlebarOptions.closebox = 1
  26.         window("info").open()
  27.       end if
  28.     end if
  29.   end if
  30.   sprite(me.spriteNum).member = "install_knop_N"
  31.   if member("bestandsnaam").text <> EMPTY then
  32.     baOpenFile(the moviePath & "DATA" & dirChar & member("bestandsnaam").text, "normal")
  33.   end if
  34. end
  35.